-- Written for Daggerfall Unity by Harbinger451
Quest: PROST002
DisplayName: Pay for a Tumble
-- Message panels
QRC:

QuestorOffer:  [1000]
<ce>                 Want to do something you can be ashamed of?
                                     <--->
<ce>                Come on, sweetheart. I bet you want to do it.
                                     <--->
<ce>                       Do you want to fool around?
                                     <--->
<ce>               Hey... would you like to take a tumble with me?
                                     <--->
<ce>                 I'm a professional when it comes to love.
<ce>                          Wanna give me a try?

RefuseQuest:  [1001]
<ce>                   Where's your sense of adventure, %ra.
                                     <--->
<ce>                   You'll regret it. Maybe not today.
<ce>                 Maybe not tomorrow. But sometime soon,
<ce>			and for the rest of your life.
                                     <--->
<ce>                 I'm not going to lie. I'm disappointed.
                                     <--->
<ce>                    I'm not good enough, is that it?
                                     <--->
<ce>              Blast! I really need to scrape some coin together.

AcceptQuest:  [1002]
<ce>                   But first, let us discuss the small
<ce>                           matter of my fee.
                                     <--->
<ce>                      I must broach the subject of
<ce>                        currency with you first.
                                     <--->
<ce>                      Before going any further, let
<ce>                    us discuss the costs of congress.
                                     <--->
<ce>                  Now, there is the matter of my payment
<ce>                   before we get this show on the road.

QuestFail:  [1003]
<ce>                       I ain't no charity, honey.
<ce>                               Clear off!
                                     <--->
<ce>                       No money, no fun, sweetie.
<ce>                             Now, shove off!
                                     <--->
<ce>                            %oth! Next time,
<ce>                     be sure to have enough gold.
                                     <--->
<ce>                                 %oth!
<ce>          If you don't have enough coin, then please... move along!

QuestComplete:  [1004]
<ce>                          Thanks for the gold!
<ce>             It was a pleasure doing business with you, %pcf. 
<ce>                     Please, tell all your friends.
                                     <--->
<ce>                   You can come anytime you like, %pcf.
<ce>                        I'm always here for you...
<ce>                             and your gold.
                                     <--->
<ce>               Well, that certainly blew the cobwebs away.
<ce>                       I'm always available, %pcf...
<ce>                          for the right price.
                                     <--->
<ce>                   %oth! That was a memorable experience.
<ce>         I'll cherish that memory almost as much as your lovely coins.

RumorsPostsuccess:  [1007]
Some lucky %ra adventurer had a real good time with _qgiver_, %g1's been smiling ever since.
<--->
_qgiver_ has been mooning about lately. It would seem %g1's fallen head-over-heals for some new client.
<--->
What's the world coming to. It seems everybody is willing to prostitute themselves for the merest whiff of coin these days.

QuestorPostsuccess:  [1008]
Oh, it's you, %pcf. I hope you enjoyed our little assignation, I certainly did.
<--->
I can't stop gushing over you, %pcf. I enjoyed you almost as much as you did me.

QuestLogEntry:  [1010]
%qdt
_qgiver_ in __qgiver_ 
of ___qgiver_ wants 200 gold for a tumble.

Message:  1011
%qdt:
I had a very pleasurable tumble with _qgiver_ in __qgiver_ 
of ___qgiver_. It only cost me 200 gold pieces.
Though now, I fear I may have contracted something nasty.

Message:  1012
<ce>                 I'll rock your world for a measly 200.
                                     <--->
<ce>                  A special offer, only 200 gold pieces.
                                     <--->
<ce>                   A terrific tumble for just 200 gold?
                                     <--->
<ce>              Believe me when I say it's a bargain at 200 coins?

Message:  1013
<ce>                           Splendid news, %pcf. 
<ce>                         I'm ready when you are.
                                     <--->
<ce>                             I can't wait!
<ce>                  So hurry up and make your move, %pcf.
                                     <--->
<ce>                      I'm ready and willing, %pcf.
<ce>                      Don't make me wait forever!
                                     <--->
<ce>                      That's what I like to hear.
<ce>                     Come on then, give it to me!

Message:  1014
<ce>              You didn't strike me as a penny pincher, %pcf.
<ce>               Maybe next time you'll come to your senses.
                                     <--->
<ce>               I wouldn't have pegged you as cheap, %pcf.
<ce>                        Oh well. Each to his own.
                                     <--->
<ce>                    What? You don't think I'm worth it?
<ce>                          You insult me, %pcf.
                                     <--->
<ce>                      I haven't got time for this!
<ce>               If you're not paying me stop talking to me.

Message:  1015
<ce>                         Now, lets get down to
<ce>                       to some serious delights.
<ce>                                  ...
<ce>                      Take me. Oh, yes! You know how.
<ce>                        Rock me, baby. Yes, YES!
<ce>                           Do it, that's right.
<ce>                                  ...
<ce>                             Harder! Faster!
<ce>                                  ...
<ce>                         Keep going! Don't stop!
<ce>                                  ...
<ce>                            Ooooh-whee, YES!
<ce>                                  ...
<ce>                       By Prince Sanguine himself,
<ce>                        but you're SO good at it!
<ce>                           I'm all a tremble!
                                     <--->
<ce>                       Right then, lets get to it
<ce>                      and indulge in some delights.
<ce>                                 ...
<ce>                       Oh, yes! Take me! Take me!
<ce>                  %oth! You really know where it's at.
<ce>                                 ...
<ce>                   Deeper! That's the spot! Yes! Yes!
<ce>                                 ...
<ce>                     Don't stop! I'm fainting away!
<ce>                                 ...
<ce>                       Yes! Yes! Ooooh! Aaaah!
<ce>                                 ...
<ce>                       By all the daedra, %pcf.
<ce>                    You made me blush, and believe
<ce>                         me, that's not easy!

Message:  1016
%qdt:
I had a very pleasurable tumble with _qgiver_ in __qgiver_ 
of ___qgiver_. It only cost me 200 gold pieces.

QBN:

Person _qgiver_ group Questor

Clock _paywindow_ 05:00

-- Quest start-up:
    start timer _paywindow_
    prompt 1012 yes _pcpay_ no _pctight_
    log 1010 step 0 

_pcpay_ task:
    say 1013
    pay 200 money do _pcpaid_ otherwise do _pcpoor_

_pctight_ task:
    say 1014
    change repute with _qgiver_ by -2
    remove log step 0
    end quest

_paywindow_ task:
    remove log step 0
    end quest

_pcpaid_ task:
    clear _pcpay_
    pick one of _pcinfect1in3_ _pcclear_ _pcclear_

_pcinfect1in3_ task:
    pick one of _pcinfect1in9_ _pcclear_ _pcclear_

_pcinfect1in9_ task:
    pick one of _pcinfect1in27_ _pcclear_ _pcclear_

_pcinfect1in27_ task:
    pick one of _pox_ _pox_ _leprosy_ _plague_

_pox_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1011 step 1
    make pc ill with Witches'_Pox
    end quest

_leprosy_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1011 step 1
    make pc ill with Leprosy
    end quest

_plague_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1011 step 1
    make pc ill with Plague
    end quest

_pcclear_ task:
    say 1015
    train pc Streetwise
    give pc nothing
    remove log step 0
    log 1016 step 1
    end quest

_pcpoor_ task:
    say 1003
    remove log step 0
    end quest

